home *** CD-ROM | disk | FTP | other *** search
/ PC/CD Review 47 / PCR_0995.bin / retros / retrosz.dir / 00035_Script_checkroll script < prev    next >
Text File  |  1995-07-06  |  946b  |  60 lines
  1. --
  2. on startPuppets
  3.   set channelnum to 2
  4.   repeat with channelnum = 2 to 4
  5.     puppetSprite channelnum, TRUE
  6.   end repeat
  7.   --
  8. end startPuppets
  9. --
  10. --
  11. on checkRoll
  12.   if rollover(2) then 
  13.     go to frame 8
  14.   else
  15.     if rollover(3) then
  16.       go to frame 6
  17.     else 
  18.       if rollover(4) then
  19.         go to frame 10
  20.       else
  21.         if rollover(5) then
  22.           go to frame "quit"
  23.         else
  24.           go to frame "menu"
  25.         end if
  26.       end if
  27.     end if
  28.   end if
  29. end checkRoll
  30. --
  31. --
  32. --
  33. on endPuppets
  34. repeat with channelnum = 5 to 9
  35. puppetSprite channelnum, FALSE
  36. end repeat
  37. --
  38. when timeOut then nothing
  39. --
  40. end endPuppets
  41. --
  42. on albRoll
  43. set c to 4
  44. repeat with c = 4 to 14
  45. if rollover(c)  then 
  46. set f  to the castnum of sprite c
  47. go to frame f
  48. end if
  49. end repeat
  50. end albRoll
  51.  
  52. on vidRoll
  53. if rollover(3) then
  54. go to frame 12
  55. end if
  56. if rollover(9) then
  57. go to frame 15
  58. end if
  59. end vidRoll
  60.